home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / c / tcclib.exe / VLIN.C < prev    next >
Encoding:
Text File  |  1990-01-31  |  801 b   |  40 lines
  1. unsigned char far *ScrPtr( int x, int y );
  2.  
  3. void VLin( int x, int y, int xx, int yy )
  4. {
  5.     register unsigned char far *scptr = ScrPtr( x, y );
  6.     register int i;
  7.  
  8.     if ( y == yy ) {
  9.         switch( *scptr ) {
  10.             case 205 : *scptr = 206; break;
  11.             case 196 : *scptr = 215; break;
  12.             default  : *scptr = 186; break;
  13.         }
  14.         return;
  15.     }
  16.  
  17.     switch( *scptr ) {
  18.         case 205 : *scptr = 203; break;
  19.         case 196 : *scptr = 210; break;
  20.         default  : *scptr = 186; break;
  21.     }
  22.  
  23.     for (i=y+1; i<yy; ++i) {
  24.         scptr+=160;
  25.         switch( *scptr ) {
  26.             case 205 : *scptr = 206; break;
  27.             case 196 : *scptr = 215; break;
  28.             default  : *scptr = 186; break;
  29.         }
  30.     }
  31.  
  32.     scptr+=160;
  33.     switch( *scptr ) {
  34.         case 205 : *scptr = 202; break;
  35.         case 196 : *scptr = 208; break;
  36.         default  : *scptr = 186; break;
  37.     }
  38.  
  39. }
  40.